Con log:"Setting up methods" from:"Range".

Repl methodIn:RangeClass.
from: a to:b [
   x <- self new.
   x from: a.
   x to: b.
   ^x.
]

Repl methodIn:Range.
from: a[ from <- a ]
Repl methodIn:Range.
to: a[ to <- a ]

Repl methodIn:Range.
toString[
   x <- StringBuffer new.
   x append: "Range(".
   x append: (from toString).
   x append: " to ".
   x append: (to toString).
   x append: ")".
   ^x toString.
]
